home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / g_quake / ultqsrc.zip / WORLD.QC < prev    next >
Text File  |  1996-10-02  |  16KB  |  527 lines
  1.  
  2. void() InitBodyQue;
  3.  
  4.  
  5. void() main =
  6. {
  7.     dprint ("main function\n");
  8.     
  9. // these are just commands the the prog compiler to copy these files
  10.  
  11.     precache_file ("progs.dat");
  12.     precache_file ("gfx.wad");
  13.     precache_file ("quake.rc");
  14.     precache_file ("default.cfg");
  15.  
  16.     precache_file ("end1.bin");
  17.     precache_file2 ("end2.bin");
  18.  
  19.     precache_file ("demo1.dem");
  20.     precache_file ("demo2.dem");
  21.     precache_file ("demo3.dem");
  22.  
  23. //
  24. // these are all of the lumps from the cached.ls files
  25. //
  26.     precache_file ("gfx/palette.lmp");
  27.     precache_file ("gfx/colormap.lmp");
  28.  
  29.     precache_file2 ("gfx/pop.lmp");
  30.  
  31.     precache_file ("gfx/complete.lmp");
  32.     precache_file ("gfx/inter.lmp");
  33.  
  34.     precache_file ("gfx/ranking.lmp");
  35.     precache_file ("gfx/vidmodes.lmp");
  36.     precache_file ("gfx/finale.lmp");
  37.     precache_file ("gfx/conback.lmp");
  38.     precache_file ("gfx/qplaque.lmp");
  39.  
  40.     precache_file ("gfx/menudot1.lmp");
  41.     precache_file ("gfx/menudot2.lmp");
  42.     precache_file ("gfx/menudot3.lmp");
  43.     precache_file ("gfx/menudot4.lmp");
  44.     precache_file ("gfx/menudot5.lmp");
  45.     precache_file ("gfx/menudot6.lmp");
  46.  
  47.     precache_file ("gfx/menuplyr.lmp");
  48.     precache_file ("gfx/bigbox.lmp");
  49.     precache_file ("gfx/dim_modm.lmp");
  50.     precache_file ("gfx/dim_drct.lmp");
  51.     precache_file ("gfx/dim_ipx.lmp");
  52.     precache_file ("gfx/dim_tcp.lmp");
  53.     precache_file ("gfx/dim_mult.lmp");
  54.     precache_file ("gfx/mainmenu.lmp");
  55.     
  56.     precache_file ("gfx/box_tl.lmp");
  57.     precache_file ("gfx/box_tm.lmp");
  58.     precache_file ("gfx/box_tr.lmp");
  59.     
  60.     precache_file ("gfx/box_ml.lmp");
  61.     precache_file ("gfx/box_mm.lmp");
  62.     precache_file ("gfx/box_mm2.lmp");
  63.     precache_file ("gfx/box_mr.lmp");
  64.     
  65.     precache_file ("gfx/box_bl.lmp");
  66.     precache_file ("gfx/box_bm.lmp");
  67.     precache_file ("gfx/box_br.lmp");
  68.     
  69.     precache_file ("gfx/sp_menu.lmp");
  70.     precache_file ("gfx/ttl_sgl.lmp");
  71.     precache_file ("gfx/ttl_main.lmp");
  72.     precache_file ("gfx/ttl_cstm.lmp");
  73.     
  74.     precache_file ("gfx/mp_menu.lmp");
  75.     
  76.     precache_file ("gfx/netmen1.lmp");
  77.     precache_file ("gfx/netmen2.lmp");
  78.     precache_file ("gfx/netmen3.lmp");
  79.     precache_file ("gfx/netmen4.lmp");
  80.     precache_file ("gfx/netmen5.lmp");
  81.     
  82.     precache_file ("gfx/sell.lmp");
  83.     
  84.     precache_file ("gfx/help0.lmp");
  85.     precache_file ("gfx/help1.lmp");
  86.     precache_file ("gfx/help2.lmp");
  87.     precache_file ("gfx/help3.lmp");
  88.     precache_file ("gfx/help4.lmp");
  89.     precache_file ("gfx/help5.lmp");
  90.  
  91.     precache_file ("gfx/pause.lmp");
  92.     precache_file ("gfx/loading.lmp");
  93.  
  94.     precache_file ("gfx/p_option.lmp");
  95.     precache_file ("gfx/p_load.lmp");
  96.     precache_file ("gfx/p_save.lmp");
  97.     precache_file ("gfx/p_multi.lmp");
  98.  
  99. // sounds loaded by C code
  100.     precache_sound ("misc/menu1.wav");
  101.     precache_sound ("misc/menu2.wav");
  102.     precache_sound ("misc/menu3.wav");
  103.  
  104.     precache_sound ("ambience/water1.wav");
  105.     precache_sound ("ambience/wind2.wav");
  106.        
  107. // shareware
  108.     precache_file ("maps/start.bsp");
  109.  
  110.     precache_file ("maps/e1m1.bsp");
  111.     precache_file ("maps/e1m2.bsp");
  112.     precache_file ("maps/e1m3.bsp");
  113.     precache_file ("maps/e1m4.bsp");
  114.     precache_file ("maps/e1m5.bsp");
  115.     precache_file ("maps/e1m6.bsp");
  116.     precache_file ("maps/e1m7.bsp");
  117.     precache_file ("maps/e1m8.bsp");
  118.  
  119. // registered
  120.     precache_file2 ("gfx/pop.lmp");
  121.  
  122.     precache_file2 ("maps/e2m1.bsp");
  123.     precache_file2 ("maps/e2m2.bsp");
  124.     precache_file2 ("maps/e2m3.bsp");
  125.     precache_file2 ("maps/e2m4.bsp");
  126.     precache_file2 ("maps/e2m5.bsp");
  127.     precache_file2 ("maps/e2m6.bsp");
  128.     precache_file2 ("maps/e2m7.bsp");
  129.  
  130.     precache_file2 ("maps/e3m1.bsp");
  131.     precache_file2 ("maps/e3m2.bsp");
  132.     precache_file2 ("maps/e3m3.bsp");
  133.     precache_file2 ("maps/e3m4.bsp");
  134.     precache_file2 ("maps/e3m5.bsp");
  135.     precache_file2 ("maps/e3m6.bsp");
  136.     precache_file2 ("maps/e3m7.bsp");
  137.  
  138.     precache_file2 ("maps/e4m1.bsp");
  139.     precache_file2 ("maps/e4m2.bsp");
  140.     precache_file2 ("maps/e4m3.bsp");
  141.     precache_file2 ("maps/e4m4.bsp");
  142.     precache_file2 ("maps/e4m5.bsp");
  143.     precache_file2 ("maps/e4m6.bsp");
  144.     precache_file2 ("maps/e4m7.bsp");
  145.     precache_file2 ("maps/e4m8.bsp");
  146.  
  147.     precache_file2 ("maps/end.bsp");
  148.  
  149.     precache_file2 ("maps/dm1.bsp");
  150.     precache_file2 ("maps/dm2.bsp");
  151.     precache_file2 ("maps/dm3.bsp");
  152.     precache_file2 ("maps/dm4.bsp");
  153.     precache_file2 ("maps/dm5.bsp");
  154.     precache_file2 ("maps/dm6.bsp");
  155. };
  156.  
  157.  
  158. entity    lastspawn;
  159.  
  160. //=======================
  161. /*QUAKED worldspawn (0 0 0) ?
  162. Only used for the world entity.
  163. Set message to the level name.
  164. Set sounds to the cd track to play.
  165.  
  166. World Types:
  167. 0: medieval
  168. 1: metal
  169. 2: base
  170. */
  171. //=======================
  172. void() worldspawn =
  173. {
  174.     lastspawn = world;
  175.     InitBodyQue ();
  176.  
  177. // custom map attributes
  178.     if (self.model == "maps/e1m8.bsp")
  179.         cvar_set ("sv_gravity", "100");
  180.     else
  181.         cvar_set ("sv_gravity", "800");
  182.  
  183. // the area based ambient sounds MUST be the first precache_sounds
  184.  
  185. // player precaches    
  186.     W_Precache ();            // get weapon precaches
  187.  
  188. //Dog
  189.     precache_model ("progs/h_dog.mdl");
  190.     precache_model ("progs/dog.mdl");
  191.  
  192.     precache_sound ("dog/dattack1.wav");
  193.     precache_sound ("dog/ddeath.wav");
  194.     precache_sound ("dog/dpain1.wav");
  195.     precache_sound ("dog/dsight.wav");
  196.     precache_sound ("dog/idle.wav");
  197. //Enforcer
  198.     precache_model2 ("progs/enforcer.mdl");
  199.     precache_model2 ("progs/h_mega.mdl");
  200.  
  201.     precache_sound2 ("enforcer/death1.wav");
  202.     precache_sound2 ("enforcer/idle1.wav");
  203.     precache_sound2 ("enforcer/pain1.wav");
  204.     precache_sound2 ("enforcer/pain2.wav");
  205.     precache_sound2 ("enforcer/sight1.wav");
  206.     precache_sound2 ("enforcer/sight2.wav");
  207.     precache_sound2 ("enforcer/sight3.wav");
  208.     precache_sound2 ("enforcer/sight4.wav");
  209.  
  210. //Hell Knight
  211.     precache_model2 ("progs/hknight.mdl");
  212.     precache_model2 ("progs/k_spike.mdl");
  213.     precache_model2 ("progs/h_hellkn.mdl");
  214.  
  215.     
  216.     precache_sound2 ("hknight/attack1.wav");
  217.     precache_sound2 ("hknight/death1.wav");
  218.     precache_sound2 ("hknight/pain1.wav");
  219.     precache_sound2 ("hknight/sight1.wav");
  220.     precache_sound ("hknight/hit.wav");        // used by C code, so don't sound2
  221.     precache_sound2 ("hknight/slash1.wav");
  222.     precache_sound2 ("hknight/idle.wav");
  223.     precache_sound2 ("hknight/grunt.wav");
  224.  
  225.     precache_sound ("knight/sword1.wav");
  226.     precache_sound ("knight/sword2.wav");
  227. //Knight
  228.     precache_model ("progs/knight.mdl");
  229.     precache_model ("progs/h_knight.mdl");
  230.  
  231.     precache_sound ("knight/kdeath.wav");
  232.     precache_sound ("knight/khurt.wav");
  233.     precache_sound ("knight/ksight.wav");
  234. //        precache_sound ("knight/sword1.wav");
  235. //        precache_sound ("knight/sword2.wav");
  236.         precache_sound ("knight/idle.wav");
  237. //Soldier
  238.     precache_model ("progs/soldier.mdl");
  239.         precache_model ("progs/h_guard.mdl");
  240.         precache_model ("progs/gib1.mdl");
  241.     precache_model ("progs/gib2.mdl");
  242.     precache_model ("progs/gib3.mdl");
  243.  
  244.     precache_sound ("soldier/death1.wav");
  245.     precache_sound ("soldier/idle.wav");
  246.     precache_sound ("soldier/pain1.wav");
  247.     precache_sound ("soldier/pain2.wav");
  248.     precache_sound ("soldier/sattck1.wav");
  249.     precache_sound ("soldier/sight1.wav");
  250.  
  251.     precache_sound ("player/udeath.wav");        // gib death
  252. //Wiz
  253.     precache_model ("progs/wizard.mdl");
  254.     precache_model ("progs/h_wizard.mdl");
  255.     precache_model ("progs/w_spike.mdl");
  256.  
  257.     precache_sound ("wizard/hit.wav");        // used by c code
  258.     precache_sound ("wizard/wattack.wav");
  259.     precache_sound ("wizard/wdeath.wav");
  260.     precache_sound ("wizard/widle1.wav");
  261.     precache_sound ("wizard/widle2.wav");
  262.     precache_sound ("wizard/wpain.wav");
  263.     precache_sound ("wizard/wsight.wav");
  264. //^Summon Scrag
  265.     precache_model ("progs/ogre.mdl");
  266.     precache_model ("progs/h_ogre.mdl");
  267.     precache_model ("progs/grenade.mdl");
  268.  
  269.     precache_sound ("ogre/ogdrag.wav");
  270.     precache_sound ("ogre/ogdth.wav");
  271.     precache_sound ("ogre/ogidle.wav");
  272.     precache_sound ("ogre/ogidle2.wav");
  273.     precache_sound ("ogre/ogpain1.wav");
  274.     precache_sound ("ogre/ogsawatk.wav");
  275.     precache_sound ("ogre/ogwake.wav");
  276. //^Summon Ogre
  277.     precache_model ("progs/shambler.mdl");
  278.     precache_model ("progs/s_light.mdl");
  279.     precache_model ("progs/h_shams.mdl");
  280.     precache_model ("progs/bolt.mdl");
  281.     
  282.     precache_sound ("shambler/sattck1.wav");
  283.     precache_sound ("shambler/sboom.wav");
  284.     precache_sound ("shambler/sdeath.wav");
  285.     precache_sound ("shambler/shurt2.wav");
  286.     precache_sound ("shambler/sidle.wav");
  287.     precache_sound ("shambler/ssight.wav");
  288.     precache_sound ("shambler/melee1.wav");
  289.     precache_sound ("shambler/melee2.wav");
  290.     precache_sound ("shambler/smack.wav");
  291. //^Summon Shambler
  292.     precache_model2 ("progs/shalrath.mdl");
  293.     precache_model2 ("progs/h_shal.mdl");
  294.     precache_model2 ("progs/v_spike.mdl");
  295.     
  296.     precache_sound2 ("shalrath/attack.wav");
  297.     precache_sound2 ("shalrath/attack2.wav");
  298.     precache_sound2 ("shalrath/death.wav");
  299.     precache_sound2 ("shalrath/idle.wav");
  300.     precache_sound2 ("shalrath/pain.wav");
  301.     precache_sound2 ("shalrath/sight.wav");
  302. //^Summon Vore
  303.         precache_model ("progs/s_light.spr");
  304.     precache_model ("progs/demon.mdl");
  305.     precache_model ("progs/h_demon.mdl");
  306.  
  307.     precache_sound ("demon/ddeath.wav");
  308.     precache_sound ("demon/dhit2.wav");
  309.     precache_sound ("demon/djump.wav");
  310.     precache_sound ("demon/dpain1.wav");
  311.     precache_sound ("demon/idle1.wav");
  312.     precache_sound ("demon/sight2.wav");
  313. //^Summon Fiend
  314.  
  315. //End monster precache
  316.  
  317. // sounds used from C physics code
  318.     precache_sound ("demon/dland2.wav");        // landing thud
  319.     precache_sound ("misc/h2ohit1.wav");        // landing splash
  320.         precache_sound ("items/protect2.wav");
  321.  
  322. // setup precaches allways needed
  323.     precache_sound ("items/itembk2.wav");        // item respawn sound
  324.     precache_sound ("player/plyrjmp8.wav");        // player jump
  325.     precache_sound ("player/land.wav");            // player landing
  326.     precache_sound ("player/land2.wav");        // player hurt landing
  327.     precache_sound ("player/drown1.wav");        // drowning pain
  328.     precache_sound ("player/drown2.wav");        // drowning pain
  329.     precache_sound ("player/gasp1.wav");        // gasping for air
  330.     precache_sound ("player/gasp2.wav");        // taking breath
  331.     precache_sound ("player/h2odeath.wav");        // drowning death
  332.         precache_sound ("demon/djump.wav");         // demon jump
  333.         precache_sound ("demon/dhit2.wav");
  334.  
  335.     precache_sound ("misc/talk.wav");            // talk
  336.     precache_sound ("player/teledth1.wav");        // telefrag
  337.     precache_sound ("misc/r_tele1.wav");        // teleport sounds
  338.     precache_sound ("misc/r_tele2.wav");
  339.     precache_sound ("misc/r_tele3.wav");
  340.     precache_sound ("misc/r_tele4.wav");
  341.     precache_sound ("misc/r_tele5.wav");
  342.     precache_sound ("weapons/lock4.wav");        // ammo pick up
  343.     precache_sound ("weapons/pkup.wav");        // weapon up
  344.     precache_sound ("items/armor1.wav");        // armor up
  345.     precache_sound ("weapons/lhit.wav");        //lightning
  346.     precache_sound ("weapons/lstart.wav");        //lightning start
  347.     precache_sound ("items/damage3.wav");
  348.  
  349.     precache_sound ("misc/power.wav");            //lightning for boss
  350.  
  351. // player gib sounds
  352.     precache_sound ("player/gib.wav");            // player gib sound
  353.     precache_sound ("player/udeath.wav");        // player gib sound
  354.     precache_sound ("player/tornoff2.wav");        // gib sound
  355.  
  356. // player pain sounds
  357.  
  358.     precache_sound ("player/pain1.wav");
  359.     precache_sound ("player/pain2.wav");
  360.     precache_sound ("player/pain3.wav");
  361.     precache_sound ("player/pain4.wav");
  362.     precache_sound ("player/pain5.wav");
  363.     precache_sound ("player/pain6.wav");
  364.  
  365. // player death sounds
  366.     precache_sound ("player/death1.wav");
  367.     precache_sound ("player/death2.wav");
  368.     precache_sound ("player/death3.wav");
  369.     precache_sound ("player/death4.wav");
  370.     precache_sound ("player/death5.wav");
  371.  
  372. // ax sounds    
  373.     precache_sound ("weapons/ax1.wav");            // ax swoosh
  374.     precache_sound ("player/axhit1.wav");        // ax hit meat
  375.     precache_sound ("player/axhit2.wav");        // ax hit world
  376.  
  377.     precache_sound ("player/h2ojump.wav");        // player jumping into water
  378.     precache_sound ("player/slimbrn2.wav");        // player enter slime
  379.     precache_sound ("player/inh2o.wav");        // player enter water
  380.     precache_sound ("player/inlava.wav");        // player enter lava
  381.     precache_sound ("misc/outwater.wav");        // leaving water sound
  382.  
  383.     precache_sound ("player/lburn1.wav");        // lava burn
  384.     precache_sound ("player/lburn2.wav");        // lava burn
  385.  
  386.     precache_sound ("misc/water1.wav");            // swimming
  387.     precache_sound ("misc/water2.wav");            // swimming
  388.  
  389.         precache_model ("progs/demon.mdl");
  390.         precache_model ("progs/laser.mdl"); //BILL ADD
  391.     precache_model ("progs/player.mdl");
  392.     precache_model ("progs/eyes.mdl");
  393.     precache_model ("progs/h_player.mdl");
  394.     precache_model ("progs/gib1.mdl");
  395.     precache_model ("progs/gib2.mdl");
  396.     precache_model ("progs/gib3.mdl");
  397.  
  398.     precache_model ("progs/s_bubble.spr");    // drowning bubbles
  399.     precache_model ("progs/s_explod.spr");    // sprite explosion
  400.  
  401.     precache_model ("progs/v_axe.mdl");
  402.     precache_model ("progs/v_shot.mdl");
  403.     precache_model ("progs/v_nail.mdl");
  404.     precache_model ("progs/v_rock.mdl");
  405.     precache_model ("progs/v_shot2.mdl");
  406.     precache_model ("progs/v_nail2.mdl");
  407.     precache_model ("progs/v_rock2.mdl");
  408.  
  409.     precache_model ("progs/bolt.mdl");        // for lightning gun
  410.     precache_model ("progs/bolt2.mdl");        // for lightning gun
  411.     precache_model ("progs/bolt3.mdl");        // for boss shock
  412.     precache_model ("progs/lavaball.mdl");    // for testing
  413.     
  414.     precache_model ("progs/missile.mdl");
  415.     precache_model ("progs/grenade.mdl");
  416.     precache_model ("progs/spike.mdl");
  417.     precache_model ("progs/s_spike.mdl");
  418.  
  419.     precache_model ("progs/backpack.mdl");
  420.  
  421.     precache_model ("progs/zom_gib.mdl");
  422.  
  423.     precache_model ("progs/v_light.mdl");
  424.  
  425. //
  426. // Setup light animation tables. 'a' is total darkness, 'z' is maxbright.
  427. //
  428.  
  429.     // 0 normal
  430.     lightstyle(0, "m");
  431.     
  432.     // 1 FLICKER (first variety)
  433.     lightstyle(1, "mmnmmommommnonmmonqnmmo");
  434.     
  435.     // 2 SLOW STRONG PULSE
  436.     lightstyle(2, "abcdefghijklmnopqrstuvwxyzyxwvutsrqponmlkjihgfedcba");
  437.     
  438.     // 3 CANDLE (first variety)
  439.     lightstyle(3, "mmmmmaaaaammmmmaaaaaabcdefgabcdefg");
  440.     
  441.     // 4 FAST STROBE
  442.     lightstyle(4, "mamamamamama");
  443.     
  444.     // 5 GENTLE PULSE 1
  445.     lightstyle(5,"jklmnopqrstuvwxyzyxwvutsrqponmlkj");
  446.     
  447.     // 6 FLICKER (second variety)
  448.     lightstyle(6, "nmonqnmomnmomomno");
  449.     
  450.     // 7 CANDLE (second variety)
  451.     lightstyle(7, "mmmaaaabcdefgmmmmaaaammmaamm");
  452.     
  453.     // 8 CANDLE (third variety)
  454.     lightstyle(8, "mmmaaammmaaammmabcdefaaaammmmabcdefmmmaaaa");
  455.     
  456.     // 9 SLOW STROBE (fourth variety)
  457.     lightstyle(9, "aaaaaaaazzzzzzzz");
  458.     
  459.     // 10 FLUORESCENT FLICKER
  460.     lightstyle(10, "mmamammmmammamamaaamammma");
  461.  
  462.     // 11 SLOW PULSE NOT FADE TO BLACK
  463.     lightstyle(11, "abcdefghijklmnopqrrqponmlkjihgfedcba");
  464.     
  465.     // styles 32-62 are assigned by the light program for switchable lights
  466.  
  467.     // 63 testing
  468.     lightstyle(63, "a");
  469. };
  470.  
  471. void() StartFrame =
  472. {
  473.     teamplay = cvar("teamplay");
  474.     skill = cvar("skill");
  475.     framecount = framecount + 1;
  476. };
  477.  
  478. /*
  479. ==============================================================================
  480.  
  481. BODY QUE
  482.  
  483. ==============================================================================
  484. */
  485.  
  486. entity    bodyque_head;
  487.  
  488. void() bodyque =
  489. {    // just here so spawn functions don't complain after the world
  490.     // creates bodyques
  491. };
  492.  
  493. void() InitBodyQue =
  494. {
  495.     local entity    e;
  496.     
  497.     bodyque_head = spawn();
  498.     bodyque_head.classname = "bodyque";
  499.     bodyque_head.owner = spawn();
  500.     bodyque_head.owner.classname = "bodyque";
  501.     bodyque_head.owner.owner = spawn();
  502.     bodyque_head.owner.owner.classname = "bodyque";
  503.     bodyque_head.owner.owner.owner = spawn();
  504.     bodyque_head.owner.owner.owner.classname = "bodyque";
  505.     bodyque_head.owner.owner.owner.owner = bodyque_head;
  506. };
  507.  
  508.  
  509. // make a body que entry for the given ent so the ent can be
  510. // respawned elsewhere
  511. void(entity ent) CopyToBodyQue =
  512. {
  513.     bodyque_head.angles = ent.angles;
  514.     bodyque_head.model = ent.model;
  515.     bodyque_head.modelindex = ent.modelindex;
  516.     bodyque_head.frame = ent.frame;
  517.     bodyque_head.colormap = ent.colormap;
  518.     bodyque_head.movetype = ent.movetype;
  519.     bodyque_head.velocity = ent.velocity;
  520.     bodyque_head.flags = 0;
  521.     setorigin (bodyque_head, ent.origin);
  522.     setsize (bodyque_head, ent.mins, ent.maxs);
  523.     bodyque_head = bodyque_head.owner;
  524. };
  525.  
  526.  
  527.